(import '(javax.swing JFrame)
	'(java.awt BorderLayout))

(load-file "context.clj")
(load-file "ui.clj")

(def context (struct Context nil nil))

(def canvas (create-canvas 0 1))

(def window (new JFrame "Main Window"))
(doto window
  (.setVisible true)
  (.setSize 640 480)
  (.setLayout (new BorderLayout))
  (.add canvas BorderLayout/CENTER)
  (.setDefaultCloseOperation JFrame/EXIT_ON_CLOSE))